import java.util.Stack;

/**
 * @author : zzr
 * @description :不带头双向不循环链表模拟实现
 * @date :
 */
public class MyLinkedList {

    static class ListNode {
        private int val;
        private ListNode prev; //存放节点的前驱地址
        private ListNode next; //存放节点的后继地址

        public ListNode(int val) {
            this.val = val;
        }
    }

    public ListNode head; //双向链表的头节点
    public ListNode last; //双向链表的尾节点

    /**
     * 返回链表长度
     *
     * @return
     */
    public int size() {
        ListNode cur = head;
        int count = 0;
        while (cur != null) {
            count++;
            cur = cur.next;
        }
        return count;
    }

    /**
     * 打印链表
     */
    public void display() {
        ListNode cur = head;
        while (cur != null) {
            System.out.print(cur.val + " ");
            cur = cur.next;
        }
        System.out.println();
    }

    /**
     * 查找是否包含关键字key是否在链表中
     *
     * @param key
     * @return
     */
    public boolean contains(int key) {
        ListNode cur = head;
        while (cur != null) {
            if (cur.val == key) {
                return true;
            }
            cur = cur.next;
        }
        return false;
    }

    /**
     * 将val = data的节点插入链表头部
     *
     * @param data
     */
    public void addFirst(int data) {
        ListNode node = new ListNode(data);

        if (head == null) {
            head = node;
            last = node;
        } else {
            node.next = head;
            head.prev = node;
            head = node;
        }
    }

    /**
     * 将val = data 的节点插入链表尾部
     *
     * @param data
     */
    public void addLast(int data) {
        ListNode node = new ListNode(data);

        if (last == null) {
            last = node;
            head = node;
        } else {
            last.next = node;
            node.prev = last;
            last = node;
        }
    }

    /**
     * 任意位置插入，第一个是数据节点为0号下标，将val = data的节点插入位置为index的位置
     *
     * @param index
     * @param data
     */
    public void addIndex(int index, int data) {

        //检查index的合法性
        indexCheck(index);

        //index 等于 0 相当于头插法
        if (index == 0) {
            addFirst(data);
            return;
        }

        //index 等于链表的长度 相当于尾插法
        if (index == size()) {
            addLast(data);
            return;
        }

        ListNode node = new ListNode(data);
        ListNode cur = findIndex(index);
        node.next = cur;
        node.prev = cur.prev;
        cur.prev.next = node;
        cur.prev = node;

    }

    /**
     * 找到下标为index的节点
     *
     * @param index
     * @return
     */
    private ListNode findIndex(int index) {
        ListNode cur = head;
        while (index != 0) {
            cur = cur.next;
            index--;
        }
        return cur;
    }

    /**
     * index合法性检查
     *
     * @param index
     */
    private void indexCheck(int index) {
        if (index < 0 || index > size()) {
            throw new IndexIllegalException("index 不合法 " + index);
        }
    }


    /**
     * 删除val = key的第一个节点
     *
     * @param key
     */
    public void remove(int key) {
        ListNode cur = head;
        //cur遍历链表 cur == null 说明并不存在val == key的节点
        while (cur != null) {
            if (cur.val == key) {
                //找到了val == key 的节点 需要进行删除
                if (cur == head) {
                    //删除头节点
                    if (head.next == null) {
                        //链表只有一个头节点，并且要删除的就是这个头节点
                        head = null;
                        return;
                    }
                    cur.next.prev = null;
                    head = head.next;
                } else {
                    //删除中间节点 或者 尾巴节点
                    if (cur.next != null) {
                        cur.next.prev = cur.prev;
                        cur.prev.next = cur.next;
                    } else {
                        //删除尾巴节点
                        cur.prev.next = null;
                        last = last.prev;
                    }
                }
                //因为只删除遇到的第一个val == key的节点，所以如果删除之后马上就应该结束方法
                return;
            } else {
                //这个节点的val != key cur继续向后遍历
                cur = cur.next;
            }
        }
    }

    /**
     * 删除链表中所有val == key 的节点
     *
     * @param key
     */
    public void removeAllKey(int key) {
        ListNode cur = head;
        //cur遍历链表 cur == null 说明并不存在val == key的节点
        while (cur != null) {
            if (cur.val == key) {
                //找到了val == key 的节点 需要进行删除
                if (cur == head) {
                    //删除头节点
                    if (head.next == null) {
                        //链表只有一个头节点，并且要删除的就是这个头节点
                        head = null;
                        return;
                    }
                    cur.next.prev = null;
                    head = head.next;
                } else {
                    //删除中间节点 或者 尾巴节点
                    if (cur.next != null) {
                        cur.next.prev = cur.prev;
                        cur.prev.next = cur.next;
                    } else {
                        //删除尾巴节点
                        cur.prev.next = null;
                        last = last.prev;
                    }
                }
                //因为要删除链表中所有的val == key 的值，所以删除一个之后cur继续向后遍历
                cur = cur.next;
            } else {
                //这个节点的val != key cur继续向后遍历
                cur = cur.next;
            }
        }
    }

    /**
     * 清空链表 - 方法1
     */
    public void clear1() {
        head = null;
        last = null;
    }

    /**
     * 清空链表 - 方法2
     */
    public void clear2() {
        ListNode cur = head;
        while (cur != null) {
            ListNode curNext = cur.next;
            cur.prev = null;
            cur.next = null;
            cur = curNext;
        }
        head = null;
        last = null;
    }

}